Top 10k strings from Blackjack (1983)(Keyword Software)(16k).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /

Back to the directory listing

   3 card+cntl:
   2 d$="Value":
   2 cntl=cntl+10
   2 "mpf bytes"
   1 wager=amount:
   1 totalb>player)
   1 totalb=totalb+val
   1 totalb=totala+10
   1 totala>player)
   1 totala=totala+val
   1 totala=totala+1
   1 total=1200
   1 rem=numb-(
   1 playmoney=playmoney-wager
   1 playmoney=playmoney+wager
   1 playmoney=100
   1 playmoney=0
   1 player=totalb
   1 player=totala:
   1 mymoney=mymoney-wager:
   1 mymoney=mymoney+wager:
   1 mymoney=1000
   1 l+q,c;f$(1
   1 intro=3000
   1 ilose=2400
   1 erase=4000
   1 dispbet=2800
   1 d$="twist or stick?":
   1 d$="any key to start the game":
   1 d$="Your bet is accepted.":
   1 d$="You can now tell everyone that":
   1 d$="YOU BROKE THE BANK!":
   1 d$="Well done, you won.":
   1 d$="We draw.":
   1 d$="The bank cannot cover your bet.":
   1 d$="Sorry partner, but you're":
   1 d$="Players score: "+
   1 d$="Players hand":
   1 d$="Player has BUST":
   1 d$="Instructions"
   1 d$="I'll deal again...":
   1 d$="How much do you want to bet?":
   1 d$="Hard luck, I won.":
   1 d$="FLAT BROKE!":
   1 d$="Dealers hand":
   1 d$="    NICE TRY!":
   1 check=1800
   1 c$=" J"+s$:
   1 c$=" A"+s$:
   1 amount>playmoney
   1 amount>mymoney
   1 ;totala;" OR ";totalb
   1 ;"You may score up to 21 (but at":
   1 ;"You are dealt one card by the":
   1 ;"Y O U  H A V E  ";
   1 ;"WAGER  `";wager
   1 ;"The game is played as pontoon":
   1 ;"PLAYER `";playmoney
   1 ;"BANKER `";mymoney
   1 ;"B U S T"
   1 ;"An ace can be used as 1 or 11."
   1 . NO CREDIT!":
   1 (totalb=player
   1 (totala=player
   1 "try to beat your score. The":
   1 "or twenty-ones.":
   1 "least 16) and the dealer will":
   1 "dealer, and may then make your":
   1 "dealer wins if you draw."
   1 "card you can elect to have":
   1 "bet. After being dealt the next":
   1 "another or keep your hand."
   1 "`";amount